home *** CD-ROM | disk | FTP | other *** search
/ Play Windows 1995 October / CD [playwin].bin / mac / demo / 00098.ls < prev    next >
Encoding:
Text File  |  1995-08-11  |  265 b   |  14 lines
  1. on mouseUp
  2.   puppetSprite(10, 1)
  3.   set the castNum of sprite 10 to 83
  4.   updateStage()
  5.   sound playFile 1, "click"
  6.   repeat while soundBusy(1)
  7.     nothing()
  8.   end repeat
  9.   set the castNum of sprite 10 to 77
  10.   updateStage()
  11.   puppetSprite(10, 0)
  12.   go("hsselect")
  13. end
  14.